unit g_vars;

{$IFDEF FPC}
  {$mode delphi}
{$ENDIF}

interface

uses
  zglChipmunk, zglHeader, res_manager;

type
  TRightType = (rtAdd, rtBlow, rtDel);

const
  FOLDER_RESOURCES = './res/';

  APPLICATION_NAME = 'O-Mind';
var
  SCREEN_WIDTH: Word = 800;
  SCREEN_HEIGHT: Word = 600;
  SCREEN_FULL: Boolean = True;

const
  EYE_DEG = 35;
  EYE_DIST = 13;


var
  DirHome: String;
  DirApp: String;
  DirRes: String;

  Space: PcpSpace;

  mBall: PcpBody;
  mouseBody: PcpBody;
  stBody: PcpBody;

  resMan: TResManager;

  DrawFace: Boolean = True;

  EyeBall: zglPTexture;

  RightState: TRightType;

implementation

end.

